package com.ruoyi.system.service.impl;

import cn.hutool.core.collection.CollUtil;
import cn.hutool.core.util.StrUtil;
import com.ruoyi.common.annotation.DataScope;
import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.core.domain.entity.*;
import com.ruoyi.common.core.domain.entity.dto.SysDeptListInput;
import com.ruoyi.common.core.domain.entity.dto.SysDeptSaveInput;
import com.ruoyi.common.core.domain.entity.dto.SysDeptTreeView;
import com.ruoyi.common.core.domain.entity.dto.SysDeptUpdateInput;
import com.ruoyi.common.core.text.Convert;
import com.ruoyi.common.exception.ServiceException;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.common.utils.spring.SpringUtils;
import com.ruoyi.system.service.ISysDeptService;
import lombok.RequiredArgsConstructor;
import org.babyfish.jimmer.sql.JSqlClient;
import org.babyfish.jimmer.sql.ast.Predicate;
import org.babyfish.jimmer.sql.ast.mutation.SaveMode;
import org.springframework.stereotype.Service;

import java.util.ArrayList;
import java.util.Arrays;
import java.util.List;
import java.util.stream.Collectors;

/**
 * 部门管理 服务实现
 *
 * @author ruoyi
 */

@Service
@RequiredArgsConstructor
public class SysDeptServiceImpl implements ISysDeptService {
    private final JSqlClient sqlClient;

    /**
     * 查询部门管理数据
     * todo
     *
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<SysDept> selectDeptList(SysDeptListInput dept) {
        SysDeptTable table = SysDeptTable.$;
        return sqlClient.createQuery(table)
                .whereIf(StrUtil.isNotBlank(dept.getDeptName()), () -> table.deptName().like(dept.getDeptName()))
                .whereIf(dept.getDeptId() != null && dept.getDeptId() != 0, () -> table.deptId().eq(dept.getDeptId()))
                .whereIf(StrUtil.isNotBlank(dept.getStatus()), () -> table.status().eq(dept.getStatus()))
                .select(table.fetch(
                        SysDeptFetcher.$.allScalarFields()
                                .parentId()
                ))
                .execute();
    }

    /**
     * 查询部门树结构信息
     *
     * @param dept 部门信息
     * @return 部门树信息集合
     */

    @Override
    public List<SysDeptTreeView> selectDeptTreeList(SysDeptListInput dept) {
        SysDeptTable table = SysDeptTable.$;
        return sqlClient.createQuery(table)
                .whereIf(StrUtil.isNotBlank(dept.getDeptName()), () -> table.deptName().like(dept.getDeptName()))
                .whereIf(dept.getDeptId() != null && dept.getDeptId() != 0, () -> table.deptId().eq(dept.getDeptId()))
                .whereIf(StrUtil.isNotBlank(dept.getStatus()), () -> table.status().eq(dept.getStatus()))
                .where(table.parentId().eq(0L))
                .select(table.fetch(
                        SysDeptTreeView.class
                ))
                .execute();
    }

/**
 * 构建前端所需要树结构
 *
 * @param depts 部门列表
 * @return 树结构列表
 *//*

    @Override
    public List<SysDept> buildDeptTree(List<SysDept> depts)
    {
        List<SysDept> returnList = new ArrayList<SysDept>();
        List<Long> tempList = depts.stream().map(SysDept::deptId).collect(Collectors.toList());
        for (SysDept dept : depts)
        {
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dept.parent().deptId()))
            {
                recursionFn(depts, dept);
                returnList.add(dept);
            }
        }
        if (returnList.isEmpty())
        {
            returnList = depts;
        }
        return returnList;
    }

    */
/**
 * 构建前端所需要下拉树结构
 *
 * @param depts 部门列表
 * @return 下拉树结构列表
 *//*

    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts)
    {
        List<SysDept> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    */

    /**
     * 根据角色ID查询部门树信息
     *
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Long> selectDeptListByRoleId(Long roleId) {
        SysRole role = sqlClient.findById(SysRoleFetcher.$.allScalarFields()
                .depts(SysDeptFetcher.$.parentId()), roleId);
        List<Long> deptIds = role.depts().stream().map(SysDept::parentId).collect(Collectors.toList());
        SysDeptTable table = SysDeptTable.$;
        return sqlClient.createQuery(table).
                where(table.asTableEx().roles().roleId().eq(roleId),
                        table.deptId().notInIf(role.deptCheckStrictly(), deptIds))
                .select(table.deptId()).execute();
    }


    /**
     * 根据部门ID查询信息
     *
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public SysDept selectDeptById(Long deptId) {
        SysDeptTable table = SysDeptTable.$;
        return sqlClient.createQuery(table)
                .where(table.deptId().eq(deptId))
                .select(table.fetch(
                        SysDeptFetcher.$.allScalarFields()
                                .parentId()
                ))
                .fetchOne();
    }


    /**
     * 根据ID查询所有子部门（正常状态）
     *
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public long selectNormalChildrenDeptById(Long deptId) {
        SysDeptTable table = SysDeptTable.$;
        //todo 此处mysql的dsl写法 find_in_set,后续修复使用程序来适配其他数据库
        return sqlClient.createQuery(table).where(
                        Predicate.sql(
                                "find_in_set(%v, %e)",
                                it -> it
                                        .value(deptId)
                                        .expression(table.ancestors())
                        )
                        , table.status().eq(UserConstants.DEPT_NORMAL)
                )

                .select(table).fetchUnlimitedCount();
    }

    /**
     * 是否存在子节点
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId) {
        SysDeptTable table = SysDeptTable.$;
        return sqlClient.createQuery(table)
                .where(table.parentId().eq(deptId))
                .select(table).fetchUnlimitedCount() > 0L;
    }

    /**
     * 查询部门是否存在用户
     *
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId) {
        SysDeptTable table = SysDeptTable.$;
        SysDept sysDepts = sqlClient.createQuery(table)
                .where(table.deptId().eq(deptId))
                .select(table.fetch(SysDeptFetcher.$.allScalarFields()
                        .users())).fetchOneOrNull();
        int result = sysDepts.users().size();
        return result > 0;
    }


    /**
     * 校验部门名称是否唯一
     *
     * @param deptId   部门信息
     * @param deptName 部门信息
     * @return 结果
     */
    @Override
    public boolean checkDeptNameUnique(Long deptId, String deptName, Long parentId) {
        SysDeptTable table = SysDeptTable.$;
        SysDept info = sqlClient.createQuery(table)
                .where(table.deptName().eq(deptName),
                        table.parentId().eq(parentId))
                .select(table).fetchOneOrNull();
        if (StringUtils.isNotNull(info) && info.deptId() != deptId) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }


    /**
     * 校验部门是否有数据权限
     *
     * @param deptId 部门id
     */
    @Override
    public void checkDeptDataScope(Long deptId) {
        if (!SecurityUtils.isAdmin(SecurityUtils.getUserId()) && StringUtils.isNotNull(deptId)) {
            SysDeptListInput dept = new SysDeptListInput();
            dept.setDeptId(deptId);
            List<SysDept> depts = SpringUtils.getAopProxy(this).selectDeptList(dept);
            if (StringUtils.isEmpty(depts)) {
                throw new ServiceException("没有权限访问部门数据！");
            }
        }
    }

    /**
     * 新增保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */

    @Override
    public int insertDept(SysDeptSaveInput dept) {
        SysDept info = sqlClient.findById(SysDept.class, dept.getParentId());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.DEPT_NORMAL.equals(info.status())) {
            throw new ServiceException("部门停用，不允许新增");
        }
        dept.setAncestors(info.ancestors() + "," + dept.getParentId());
        return sqlClient.saveCommand(dept).setMode(SaveMode.INSERT_ONLY).execute().getTotalAffectedRowCount();
    }

    /**
     * 修改保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */

    @Override
    public int updateDept(SysDeptUpdateInput dept) {
        SysDept newParentDept = sqlClient.findById(SysDept.class, dept.getParentId());
        SysDept oldDept = sqlClient.findById(SysDept.class, dept.getDeptId());
        if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept)) {
            String newAncestors = newParentDept.ancestors() + "," + newParentDept.deptId();
            String oldAncestors = oldDept.ancestors();
            dept.setAncestors(newAncestors);
            updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
        }
        int result = sqlClient.saveCommand(dept).setMode(SaveMode.UPDATE_ONLY).execute().getTotalAffectedRowCount();
        if (UserConstants.DEPT_NORMAL.equals(dept.getStatus()) && StringUtils.isNotEmpty(dept.getAncestors())
                && !StringUtils.equals("0", dept.getAncestors())) {
            // 如果该部门是启用状态，则启用该部门的所有上级部门
            updateParentDeptStatusNormal(dept);
        }
        return result;
    }

    /**
     * 修改该部门的父级部门状态
     *
     * @param dept 当前部门
     */
    private void updateParentDeptStatusNormal(SysDeptUpdateInput dept) {
        SysDeptTable table = SysDeptTable.$;
        String ancestors = dept.getAncestors();
        Long[] deptIds = Convert.toLongArray(ancestors);
        sqlClient.createUpdate(table)
                .where(table.deptId().in(Arrays.asList(deptIds)))
                .set(table.status(), UserConstants.DEPT_NORMAL).execute();
    }


    /**
     * 修改子元素关系
     *
     * @param deptId       被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors) {
        SysDeptTable table = SysDeptTable.$;
        //todo 此处mysql的dsl写法 find_in_set,后续修复使用程序来适配其他数据库
        List<SysDept> children = sqlClient.createQuery(table).where(
                Predicate.sql(
                        "find_in_set(%v, %e)",
                        it -> it
                                .value(deptId)
                                .expression(table.ancestors())

                )
        ).select(table).execute();
        List<SysDeptUpdateInput> updateInputList = new ArrayList<>();
        for (SysDept child : children) {
            SysDeptUpdateInput updateInput = new SysDeptUpdateInput(child);
            updateInput.setAncestors(child.ancestors().replaceFirst(oldAncestors, newAncestors));
            updateInputList.add(updateInput);
        }
        System.out.println(updateInputList);
        if (CollUtil.isNotEmpty(updateInputList)) {
            sqlClient.saveInputsCommand(updateInputList).setMode(SaveMode.UPDATE_ONLY).execute();
        }
    }

    /**
     * 删除部门管理信息
     * todo 该处删除存在问题，待排查
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Long deptId) {
        SysDeptTable table = SysDeptTable.$;
        return sqlClient.createDelete(table).where(table.deptId().eq(deptId)).execute();
    }

/**
 * 递归列表
 *//*

    private void recursionFn(List<SysDept> list, SysDept t)
    {
        // 得到子节点列表
        List<SysDept> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysDept tChild : childList)
        {
            if (hasChild(list, tChild))
            {
                recursionFn(list, tChild);
            }
        }
    }

    */
/**
 * 得到子节点列表
 *//*

    private List<SysDept> getChildList(List<SysDept> list, SysDept t)
    {
        List<SysDept> tlist = new ArrayList<SysDept>();
        Iterator<SysDept> it = list.iterator();
        while (it.hasNext())
        {
            SysDept n = (SysDept) it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue())
            {
                tlist.add(n);
            }
        }
        return tlist;
    }

    */

    /**
     * 判断是否有子节点
     */

/*    private boolean hasChild(List<SysDept> list, SysDept t) {
        return getChildList(list, t).size() > 0;
    }*/
}
